﻿Partial Public Class AlbumsPage

    Public Sub New()
        InitializeComponent()
        MyInitialize()
    End Sub

    Private Sub MyInitialize()
        AddHandler SpatialQueryBuilderControl1.SqlQueryChanged, AddressOf SetSqlQuery
    End Sub

    Public Sub SetSqlQuery(ByVal sql As String, ByVal queryname As String)
        AlbumBuilderControl1.SetQuery(sql, queryname)
    End Sub

    Private Sub AlbumsPage_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded
        'MessageBox.Show("AlbumsPage_Loaded")
    End Sub

    Private Sub TabControl1_Initialized(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.Initialized
        'MessageBox.Show("TabControl1_Initialized")
    End Sub

End Class
